﻿Public Class ClsApplicationPaths
    'represents file with paths to application core files (form templates, Components.xml, ...)

#Region "Attributes"
#Region "Private attributes"
    Private MsComponentsXMLpath As String = "" 'Components.xml
    Private MsTemplatesDir As String = "" 'directory with templates (form templates, VB project template)
    Private MsFormTemplatesDir As String = "" 'directory with form templates
    Private MsFormsExportSettings As String = "" 'form export settings
#End Region
#End Region
#Region "Public properties"
    Public Property ComponentsXMLpath() As String
        Get
            Return MsComponentsXMLpath
        End Get
        Set(ByVal IsValue As String)
            MsComponentsXMLpath = IsValue
        End Set
    End Property
    Public Property TemplatesDir() As String
        Get
            Return MsTemplatesDir
        End Get
        Set(ByVal IsValue As String)
            MsTemplatesDir = IsValue
        End Set
    End Property
    Public Property FormTemplatesDir() As String
        Get
            Return MsFormTemplatesDir
        End Get
        Set(ByVal IsValue As String)
            MsFormTemplatesDir = IsValue
        End Set
    End Property
    Public Property FormsExportSettings() As String
        Get
            Return MsFormsExportSettings
        End Get
        Set(ByVal IsValue As String)
            MsFormsExportSettings = IsValue
        End Set
    End Property
#End Region
End Class
